home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / angry / intro.dir / 00002_cursorPrep & AnimatePrep.ls < prev    next >
Encoding:
Text File  |  1999-03-01  |  808 b   |  27 lines
  1. global oldMouseP, cursorSpr, drops, animate, gravite
  2.  
  3. on enterFrame
  4.   if not soundBusy(1) then
  5.     puppetSound(1, member("fuckhead"))
  6.   end if
  7.   oldMouseP = point(0, 0)
  8.   cursorSpr = 42
  9.   drops = []
  10.   repeat with a = 30 to 41
  11.     append(drops, new(script("dropz"), a))
  12.   end repeat
  13.   nikChan = 12
  14.   tomChan = 9
  15.   benChan = 10
  16.   JeaChan = 11
  17.   nikAnim = ["Fly"]
  18.   tomAnim = []
  19.   jeaAnim = ["chix1"]
  20.   benAnim = ["stretch_1", "stretch_2", "stretch_3", "stretch_4", "stretch_5", "stretch_6", "stretch_7", "stretch_8"]
  21.   animate = [new(script("animatez"), tomChan, tomAnim), new(script("animatez"), benChan, benAnim)]
  22.   gravite = [new(script("gravity"), nikChan, nikAnim, 0), new(script("gravity"), JeaChan, jeaAnim, the number of member "soft")]
  23.   repeat with i = 5 to 7
  24.     puppetSprite(i, 1)
  25.   end repeat
  26. end
  27.